home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 26
/
Cream of the Crop 26.iso
/
educate
/
wcstrv11.zip
/
_SETUP.1
/
WCSServer.exe
/
0
/
RCDATA
/
TLMDLEDEDITORDLG
/
TLMDLEDEDITORDLG.txt
Wrap
Text File
|
1997-05-25
|
8KB
|
349 lines
object LMDLEDEditorDlg: TLMDLEDEditorDlg
Left = 189
Top = 119
ActiveControl = OK
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'LED-Editor'
ClientHeight = 334
ClientWidth = 508
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Position = poScreenCenter
ShowHint = True
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 4
Top = 185
Width = 497
Height = 8
Shape = bsBottomLine
end
object test: TLMDLEDLabel
Left = 9
Top = 7
Width = 153
Height = 28
Hint = 'Shows the current settings.'
Autosize = True
LED.Horzsize = 9
LED.Vertsize = 7
Caption = 'TEST-LED'
end
object OK: TBitBtn
Left = 419
Top = 198
Width = 82
Height = 27
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
Kind = bkOK
Margin = 2
Spacing = -1
end
object Cancel: TBitBtn
Left = 419
Top = 229
Width = 82
Height = 27
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Kind = bkCancel
Margin = 2
Spacing = -1
end
object reset: TBitBtn
Left = 419
Top = 271
Width = 82
Height = 27
Cancel = True
Caption = 'Reset'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = resetClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
3333333777333777FF33339993707399933333773337F3777FF3399933000339
9933377333777F3377F3399333707333993337733337333337FF993333333333
399377F33333F333377F993333303333399377F33337FF333373993333707333
333377F333777F333333993333101333333377F333777F3FFFFF993333000399
999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
99933773FF777F3F777F339993707399999333773F373F77777F333999999999
3393333777333777337333333999993333333333377777333333}
Margin = 2
NumGlyphs = 2
Spacing = -1
end
object LMDPanel1: TLMDPanel
Left = 8
Top = 200
Width = 403
Height = 128
Bevel.Mode = bmStandard
TabOrder = 3
object Label3: TLabel
Left = 8
Top = 17
Width = 45
Height = 13
Caption = '&HorzSize:'
FocusControl = edhs
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label4: TLabel
Left = 148
Top = 17
Width = 57
Height = 13
Caption = '&ActiveColor:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label5: TLabel
Left = 148
Top = 45
Width = 66
Height = 13
Caption = '&InActiveColor:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label1: TLabel
Left = 8
Top = 45
Width = 42
Height = 13
Caption = '&VertSize:'
FocusControl = edvs
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label2: TLabel
Left = 8
Top = 71
Width = 52
Height = 13
Caption = '&Thickness:'
FocusControl = edt
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label6: TLabel
Left = 148
Top = 71
Width = 55
Height = 13
Caption = '&Pred. Color:'
FocusControl = pred
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object LMDSimpleLabel1: TLMDSimpleLabel
Left = 221
Top = 88
Width = 114
Height = 32
Caption =
'Predefined Color-Settings for Active-/InActiveColor'#13#10'don'#39't appea' +
'r in the Combobox.'
Font.Color = clNavy
Font.Height = -8
Font.Name = 'Small Fonts'
Font.Style = []
MultiLine = True
ParentFont = False
end
object edhs: TSpinEdit
Left = 67
Top = 11
Width = 48
Height = 22
Hint = 'Defines the horizontal size of the LED-letters.'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
MaxLength = 3
MaxValue = 255
MinValue = 0
ParentFont = False
TabOrder = 0
Value = 1
OnChange = edchange
end
object chk: TCheckBox
Left = 8
Top = 97
Width = 104
Height = 20
Hint =
'If DisabledDigits is set to true and'#13#10'Enabled to false, the LED ' +
'will be '#13#10'displayed with the InactiveColor.'
Caption = ' &DisabledDigits'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = chkClick
end
object cmbb: TLMDColorComboBox
Left = 221
Top = 11
Width = 132
Height = 21
Hint = 'Defines the color for active LED-letters.'
DlgOptions = []
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [coDefaultColors, coSystemColors, coAllowAnyColor]
ParentFont = False
TabOrder = 4
OnChange = cmbc
end
object cmbL: TLMDColorComboBox
Left = 221
Top = 38
Width = 132
Height = 21
Hint = 'Defines the color for inactive LED-letters.'
DlgOptions = []
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [coDefaultColors, coSystemColors, coAllowAnyColor]
ParentFont = False
TabOrder = 6
OnChange = cmbc
end
object bt1: TButton
Left = 354
Top = 10
Width = 25
Height = 21
Caption = '...'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = btn
end
object bt2: TButton
Left = 354
Top = 38
Width = 25
Height = 21
Caption = '...'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = btn
end
object edvs: TSpinEdit
Left = 67
Top = 38
Width = 48
Height = 22
Hint = 'Defines the vertical size of the LED-letters.'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
MaxLength = 3
MaxValue = 255
MinValue = 0
ParentFont = False
TabOrder = 1
Value = 1
OnChange = edchange
end
object edt: TSpinEdit
Left = 67
Top = 65
Width = 48
Height = 22
Hint = 'Defines the thickness of the LED-letters.'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
MaxLength = 2
MaxValue = 99
MinValue = 0
ParentFont = False
TabOrder = 2
Value = 1
OnChange = edchange
end
object pred: TComboBox
Left = 221
Top = 65
Width = 132
Height = 21
Hint = 'Defines the color for both '#13#10'active and inactive LED-letters.'
Style = csDropDownList
DropDownCount = 4
ItemHeight = 13
TabOrder = 8
OnChange = predChange
end
end
end